home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / p4 / p4-1_2b.lha / p4-1.2b / lib_f / tmp / p4_fargs.f < prev    next >
Text File  |  1993-02-05  |  320b  |  14 lines
  1.       subroutine args(i,argv)
  2. C reads the options from the command line
  3.       integer i
  4. C DO NOT declare argv any bigger than 80
  5.       character*80 argv
  6.       call getarg(i,argv)
  7.       end
  8.  
  9.       subroutine numargc(icnt)
  10. C retrieves the number of command line arguments
  11.       integer icnt
  12.       icnt = iargc()
  13.       end
  14.